home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / game_224.swf / scripts / frame_176 / DoAction.as
Text File  |  2006-01-17  |  998b  |  46 lines
  1. call("winCheckInsurance");
  2. if("1" < Piles)
  3. {
  4.    call("/:multicard");
  5. }
  6. else if("0" < Busted)
  7. {
  8.    TheOneWhoWon = "Busted!";
  9. }
  10. else if(eval("/:Dealinfo01") < "22")
  11. {
  12.    if(eval("PileInfo01:t1") < DealInfo01 or DealInfo02 eq "BlackJack!")
  13.    {
  14.       TheOneWhoWon = "Dealer wins!";
  15.       set("/:TotalBet","0");
  16.    }
  17.    else if(DealInfo01 == eval("PileInfo01:t1"))
  18.    {
  19.       TheOneWhoWon = "Nobody wins";
  20.       set("/:Money",eval("/:TotalBet") + eval("/:Money"));
  21.       set("/:TotalBet","0");
  22.    }
  23.    else
  24.    {
  25.       TheOneWhoWon = "You win";
  26.       set("/:Money",eval("/:TotalBet") * "2" + eval("/:Money"));
  27.       set("/:TotalBet","0");
  28.    }
  29. }
  30. else
  31. {
  32.    TheOneWhoWon = "Dealer Busted, You win";
  33.    set("/:Money",eval("/:TotalBet") * "2" + eval("/:Money"));
  34.    set("/:TotalBet","0");
  35. }
  36. tellTarget("/TopBanner")
  37. {
  38.    gotoAndStop("WonSingle");
  39.    play();
  40.    t1 = eval("/:TheOneWhoWon");
  41. }
  42. AllowDeal = "1";
  43. AllowBet = "1";
  44. Allowmenu = "1";
  45. call("checkmoney");
  46.